(rmail-sort-messages): Use rmail-ensure-blank-line.

diff --git a/lisp/mail/rmailsort.el b/lisp/mail/rmailsort.el
index cfc939857197df90a59643af34e462323c90afce..39244669928a5282b3522398b25ce7b6738a2f4c 100644 (file)
--- a/lisp/mail/rmailsort.el
+++ b/lisp/mail/rmailsort.el
@@ -220,10 +220,7 @@ Numeric keys are sorted numerically, all others as strings."
          (insert-buffer-substring
           (current-buffer) (nth 2 msginfo) (nth 3 msginfo))
          ;; The last message may not have \n\n after it.
-         (unless (bolp)
-           (insert "\n"))
-         (unless (looking-back "\n\n")
-           (insert "\n"))
+         (rmail-ensure-blank-line)
          (delete-region (nth 2 msginfo) (nth 3 msginfo))
          ;; Is current message?
          (if (nth 1 msginfo)